home *** CD-ROM | disk | FTP | other *** search
/ MACD 7 / MACD7.iso / turbocalc_3.5 / install turbocalc < prev    next >
Encoding:
Text File  |  1998-04-06  |  3.5 KB  |  151 lines
  1.  
  2. ; ---------------------------------------------------------------------
  3. ;
  4. ; $VER: TurboCalc Installer Script 1.95 (29.08.95)
  5. ;
  6. ; Script to install TurboCalc (english version)
  7. ;
  8. ; ---------------------------------------------------------------------
  9.  
  10. (if (<> @language "polski")
  11.  ((if (<> @language "deutsch")
  12.    (set @language "polski")
  13.   )
  14.  )
  15. )
  16.  
  17. ; ---------------------------------------------------------------------
  18. ;
  19. ;   STRINGS (German)
  20. ;
  21. ; ---------------------------------------------------------------------
  22.  
  23. (if (= @language "deutsch")
  24.  (
  25.   (set #AskDestDir
  26.    (cat "Bitte wählen Sie das Verzeichnis, in dem TurboCalc "
  27.         "installiert werden soll. "
  28.         "Es wird automatisch ein neues Verzeichnis 'TurboCalc' "
  29.         "für das Programm und die Daten angelegt." )
  30.   )
  31.  
  32.   (set #AskDestDirHelp
  33.    (cat "Für die Installation werden auf dem Ziellaufwerk mindestens "
  34.         "1,5 Mbyte freier Speicherplatz benötigt.\n\n"
  35.         "Das Installationsprogramm erstellt in dem ausgewählten "
  36.         "Pfad ein neues Verzeichnis 'TurboCalc'. Alle Dateien "
  37.         "werden in dieses Verzeichnis kopiert.\n\n"
  38.         "Sie können nach der Installation dem Verzeichnis natürlich "
  39.         "einen anderen Namen geben." )
  40.   )
  41.  
  42.   (set #HelpDir
  43.    (cat "Hilfe" )
  44.   )
  45.  
  46.   (set #InsertDisk2
  47.    (cat "Bitte legen Sie die Diskette 2: 'TurboCalcHELP' ein" )
  48.   )
  49.  
  50.   (set #InsertDisk2Help
  51.    (cat "Das Installationsprogramm kopiert nun die Dateien "
  52.         "des Handbuchs und der Onlinehilfe in das Zielverzeichnis" )
  53.   )
  54.  )
  55. )
  56.  
  57. ; ---------------------------------------------------------------------
  58. ;
  59. ;   STRINGS (Polski)
  60. ;
  61. ; ---------------------------------------------------------------------
  62.  
  63. (if (= @language "polski")
  64.  (
  65.   (set #AskDestDir
  66.    (cat "Proszë wybraê miejsce, gdzie ma byê zainstalowany program TurboCalc. "
  67.         "Katalog 'TurboCalc' zostanie utworzony automatycznie." )
  68.   )
  69.  
  70.   (set #AskDestDirHelp
  71.    (cat "Do instalacji TurboCalca, potrzebne jest przynajmniej 1,5 MB"
  72.         "wolnego miejsca.\n\n"
  73.         "Installer automatycznie utworzy nowy katalog 'TurboCalc'"
  74.         "w wybranej ôcieûce dostëpu. Wszystkie pliki zostana skopiowane"
  75.         "do tego katalogu.\n\n"
  76.         "Jeûeli chcesz, moûesz zmieniê nazwë tego katalogu po zainstalowaniu." )
  77.   )
  78.  
  79.   (set #HelpDir
  80.    (cat "Help" )
  81.   )
  82.  
  83.   (set #InsertDisk2
  84.    (cat "Please insert now Disk #2: 'TurboCalcHELP'" )
  85.   )
  86.  
  87.   (set #InsertDisk2Help
  88.    (cat "The Installer tool will now copy the manual and online help "
  89.         "files to the selected destination" )
  90.   )
  91.  )
  92. )
  93.  
  94. ; ---------------------------------------------------------------------
  95. ;
  96. ;   INSTALLATION SCRIPT - BEGIN
  97. ;
  98. ; ---------------------------------------------------------------------
  99.  
  100. (set DestDir
  101.  (askdir
  102.   (prompt #AskDestDir )
  103.   (help #AskDestDirHelp )
  104.   (default "Work:")
  105.  )
  106. )
  107.  
  108. (set RealDest (tackon DestDir "TurboCalc"))
  109.  
  110. (set RealDest_Help (tackon RealDest #HelpDir))
  111.  
  112. (if (= (exists RealDest) 0)
  113.  (makedir RealDest (infos))
  114. )
  115.  
  116. (complete 4)
  117.  
  118. (copyfiles
  119.  (source "MACD7:TurboCalc_3.5/TurboCalc")
  120.  (dest RealDest)
  121.  (infos) (all)
  122. )
  123.  
  124. (complete 50)
  125.  
  126. (copyfiles
  127.  (source "MACD7:TurboCalc_3.5")
  128.  (dest RealDest_Help)
  129.  (pattern "#?.guide#?")
  130.  (infos)
  131. )
  132.  
  133. (complete 80)
  134.  
  135. (copyfiles
  136.  (source "MACD7:TurboCalc_3.5")
  137.  (dest RealDest_Help)
  138.  (pattern "programmer#?")
  139.  (infos)
  140. )
  141.  
  142. (set @default-dest RealDest)
  143.  
  144. (complete 100)
  145.  
  146. ; ---------------------------------------------------------------------
  147. ;
  148. ;   INSTALLATION SCRIPT - END
  149. ;
  150. ; ---------------------------------------------------------------------
  151.